select sql in r